home *** CD-ROM | disk | FTP | other *** search
- 1000 'MultiV CD Player TIFF => OAX Convert
- 1010 SCREEN@ 0:CLS 0
- 1020 LOAD@"CDPLAY.TIF"
- 1030 DIM CDPLAY!(INT((INT((152+7)/8)*130*4+4-1)/4))
- 1040 GET@A(0,0)-(151,129),CDPLAY!
- 1050 KILL "CDPLAYER.OAX":SAVE@"CDPLAYER.OAX",CDPLAY!
- 1060 DIM NODISC!(INT((INT((20+7)/8)*18*4+4-1)/4))
- 1070 LOAD@"NODISC.TIF"
- 1080 GET@A(0,0)-(18,17),NODISC!
- 1090 KILL "NODISC.OAX":SAVE@"NODISC.OAX",NODISC!
- 1100 DIM REPEAT!(INT((INT((19+7)/8)*8*4+4-1)/4))
- 1110 LOAD@"REPEAT.TIF"
- 1120 GET@A(0,0)-(19,7),REPEAT!
- 1130 KILL "REPEAT.OAX":SAVE@"REPEAT.OAX",REPEAT!
- 1140 ERASE CDPLAY!,NODISC!,REPEAT!
-